home *** CD-ROM | disk | FTP | other *** search
/ Belgian Amiga Club - ADF Collection / BS1 part 06.zip / BS1 part 6 / Subway - Odd Disk No. 2 (1988)(Subway)(Disk 1 of 2).7z / Subway - Odd Disk No. 2 (1988)(Subway)(Disk 1 of 2).adf / loader.S < prev    next >
Text File  |  1988-01-20  |  665b  |  57 lines
  1. ;loader fuer myth. done by mathew.
  2. ;myth. cracked and packed by mathew.
  3.  
  4. start:    move.l 4,a6
  5.     lea dosname,a1
  6.     jsr -408(a6)
  7.     move.l d0,dosbase
  8.         
  9.     move.l d0,a6
  10.     move.l #name,d1
  11.     move.l #1005,d2
  12.     jsr -30(a6)
  13.     tst d0
  14.     beq end
  15.     move.l d0,file
  16.  
  17.     move.l file,d1
  18.     move.l #$2f000,d2
  19.     move.l #106304,d3
  20.     jsr -42(a6)
  21.  
  22.     move.l file,d1
  23.     jsr -36(a6)
  24.  
  25.     move.l dosbase,a1
  26.     move.l 4,a6
  27.     jsr -414(a6)
  28.  
  29.     clr.l d0
  30.     clr.l d1
  31.     clr.l d2
  32.     clr.l d3
  33.     clr.l d4
  34.     clr.l d5
  35.     clr.l d6
  36.     clr.l d7
  37.     sub.l a0,a0
  38.     sub.l a1,a1
  39.     sub.l a2,a2
  40.     sub.l a3,a3
  41.     sub.l a4,a4
  42.     sub.l a5,a5
  43.     sub.l a6,a6
  44.  
  45.     jmp $2f020
  46. end:    rts
  47.  
  48.  
  49. dosname:dc"dos.library",0
  50.     even
  51. dosbase:dc.l 0
  52. name:    dc"myth",0
  53.     even
  54. file:    dc.l 0
  55.  
  56.  
  57.